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жэ“ EDITOR'S COMMENTS он 437 2 


FRONT COVER | 
JASON OAKLEY HAS BEEN BUSY ON THE FRONT COVER ONCE MORE. AGAIN ІТ RELATES TO 
AN ARTICLE INSIDE. THANKS JASON. 


HELP — SELL & TELL | РАСЕ 5 


М2 BUS NOUSE PART I BY L MILBURN PAGES 4—5 = 

THE FIRST PART OF THE SECOND MUSE PROJECT FOR THE VZ. LESLIE'S VERSION 
DIFFERS IN THAT NO MODS ARE REQUIRED TO THE BUS MOUSE, BUT IT'S A BIT MORE 
EXPENSIVE THAN A SERIAL MOUSE. | | 


KSCAN PT ТТТ BY LESLIE MILBURN PAGES 6-7 
THE FINAL PART ON KSCAN. DUE TO THE SIZE OF THE SOURCE CODE IT WILL NOT BE 
PUBLISHED IN THE JOURNAL. READ EDITOR'S COMMENTS ON PAGE 7 FOR MORE DETAILS. 


EXTENDED DOS V1 2.1 BY L MILBURN PPAGES 8—11 
THE FIRST PART HAS THE INSTRUCTIONS PLUS HALF THE SOURCE CODE. EXT12.1 IS A 


VERY USEFUL UTILITY WITH SOME WELCOME FUNCTIONS. 


DISKOPS 1 & 2 INSTRUCTIONS PAGE 12 
I BELIEVE THIS MAY BE THE FIRST ІМ A SERIES OF INSTRUCTIONS FOR LESLIE 
MILBURN'S DISKOP EDITOR ASSEMBLERS. 


ASSEMBLY LANGUAGE PART ТТТ PAGES 15—15 
BY BOB KTTCH 
PART 5 FEATURES LISTING 5 AND FUNCTIONS IN BASIC. 


TECHNICAL DATA SHEET # 1 PAGES 15-16 
THE FIRST IN A SERIES OF TECHNICAL DATA SHEETS FOR THE VZ. DISK DRIVE POWER 
SUPPLY AND WORDPRO CARTRIDGE CIRCUITS ARE PROVIDED. 


DRIVE HEAD PARK UPDATE PAGE 17 
GARY BULLEY VZ MOUSE ERRATTA PAGE 17 


EAGLE EYED GARY HAS SPOTTED SOME OF THE MISTAKES THAT CREPT IN AND PROVIDED 
CORRECTIONS TO THEM. 


TECHNICAL DATA SHEET # 2 | РАСЕ 19 
STATIC БАМ AND VZ ROM PINOUTS AND BLOCK DIAGRAMS ARE SHOWN. 


DAVE MITCHELL SOFTWARE FOR SALE PAGE 19 
РАТСН5 . 3 — EXT DOS & MENU/F ILE COPTER | 


PETER HICKMAN SOFTWARE FOR SALE PAGE 19 


VZ MODEM & M/C DISASSEMLER 
USER GROUPS * NEWS ж SUBSCRIPTIONS PAGE 20 


DISCLAIMER : EVERY EFFORT IS MADE TO INSURE THE ACCURACY OF INFORMATION 
CONTAINED WITHIN BE IT GENERAL, TECHNICAL, PROGRAMMING, ETC. NO RESPONSIBILITY 
CAN BE ACCEPTED BY HUNTER VALLEY VZ USERS' GROUP OR AUTHOR AS A RESULT OF APPLYING 
SUCH INFORMATION IN PRACTICE. | 


COPYRIGHT : THE HUNTER VALLEY VZ JOURNAL IS SUBJECT TO COPYRIGHT AND NO 
MATERIAL IN THE JOURNAL MAY BE REPRODUCED IN PART OR WHOLE WITHOUT THE CONSENT OF 


THE HUNTER VALLEY USERS' GROUP OR THE AUTHOR WHO RETAINS COPYRIGHT. 


єз, 


"= э “НЕГР / SELL & TELL * ж AD/S 


APOLOGIES: 


I STARTED JOURNAL EARLY JULY WHEN THINGS GOT WORSE MEDICALLY. Мү 
CONTINUING MEDICAL PROBELM IS THE RESULT OF THE CAR ACCIDENT OVER 4 
YEARS AGO WHICH AFFECTED MY SPINE AND EVERY JOINT IN MY BODY. THE 
CHRONIC PAINS ARE USUALLY AT A BEARABLE LEVEL, BUT THE WINTER JUST 
PASSED HAS NOT HELPED. 


TO COMPOUND THE PROBLEM, PAIN KILLERS GIVE NO RELIEF AT ALL. THE 
ONLY THING THAT REDUCES THE CHRONIC PAINS IS LYING DOWN SEVERAL TIMES 
A DAY WHICH TAKES A BIG CHUNK OUT OF THE DAY. ІМ THE EVENT OF THE 
JOURNAL CEASING PRODUCTION OUTSTANDING SUBSCRIPTIONS WOULD BE REFUNDED 
AS THE CLUB'S FUNDS ARE QUITE SOUND. 


ІТ IS MY INTENTION ТО PRUDUCE THE JOURNAL FOR SOME TIME TO COME AS 
THERE IS STILL A LOT OF LIFE LEFT IN THE HUMBLE VZ. IT GIVES ME А 
GREAT DEAL ОҒ PLEASURE ІМ PRUDUCING THE JOURNAL AND BEING PART OF А 
GROUP OF PEOPLE AUSTRALIA WIDE. 


GET WELL SOON NEVILLE: 


ON BEHALF OF THE HUNTER VALLEY VZ USER'S GROUP AND MYSELF WE WISH 
NEVILLE HUGHES A SPEEDY RECOVERY FROM 3 VERY BAD HEART ATTACKS. KEEP 
UP THE GOOD FIGHT NEVILLE AND WE LOOK FORWARD TO YOUR NEXT PROJECT. 


TECHNICAL DATA SHEETS: 


І WOULD LIKE YOUR OPINION ON THE DATA SHEETS AS I INTEND THEM TO 
BECOME A REGULAR ITEM IN THE JOURNAL. [Е YOU HAVE A CONTRIBUTION OR 
IDEAS FOR THEM, THEN PLEASE LET ME KNOW, ED. 


FOR SALE - TBM MOTHERBOARD: 


А COUPLE WEEKS AGO I INSTALLED АМ UP-GRADEABLE 386DX MOTHERBOARD 
WITH 4M RAM ІМ MY ІВМ COMPATIBLE PC. NEEDLESS TO SAY THE OLD 
MOTHERBOARD IS NO LONGER REQUIRED AND І OFFER IT FOR SALE. 


1 OFF BABY АТ 286 MOTHERBOARD - 6/12 MHz 
1 MEG RAM AND MATHS CO-PROCESSOR ON BOARD 

RAM EXPANDABLE TO 4M USING 4 X 1M SIPPS 
1 OFF INSTRUCTION MANUAL 


PRICE: $150.00 ONO- INCLUDES POST 8 PACKING - CONTACT: 
JOSEPH P LEON - PHONE (049) 692-399 - 33 TIGHES TCE TIGHES HILL 2297 


NEXT ISSUE: 


IT IS MY INTENTION TO PRODUCE ANOTHER ISSUE AND HAVE ТТ POSTED OUT 
BEFORE CHRISTMAS 1992 AND HOPEFULLY KEEP TO А ВІ-МОМТНІ Ү SCHEDULE. 
BELOW АКЕ SOME ОҒ THE PROPOSED MATERIAL FOR NEXT ISSUE. 


1) LISTING OF PUBLIC DOMAIN PROGRAMS. 

2) LISTING OF PUBLIC DOMAIN SOURCE CODE. 

5) ARTICLE ОМ EDITOR/ASSEMBLER INCOMPATIBILITY, 

4) TECHNICAL DATA SHEET # 4, (5-6?). 

5) PLUS CONTINUATION OR CONCLUSION OF PARTLY PUBLISHED MATERIAL. 


м2 BUS MOUSE PROJECT PART 1 ചമ.” ച. 
BY LESLIE MILBURN 


THIS PROJECT IS AN ALTERNATIVE ТО THE MOUSE PROJECT PRESENTED ІМ 


THE LAST JOURNAL AND ALLOWS A MOUSE TO BE CONNECTED WITHOUT 


MODIFICATIONS ТО THE VZ. ALL MICE WORK ROUGHLY THE SAME WAY SO I 
SHALL. NOT REPEAT HERE WHAT WAS DESCRIBED IN GARY BULLEY'S ARTICLE. 
THERE АВЕ TWO TYPES OF MOUSE : — 


(1) A SERIAL MOUSE - THIS IS THE MOST COMMON ТҮРЕ OF MOUSE AND HAS AN 
К5252С INTERFACE. THIS CAN HAVE EITHER А 089 OR 0825 CONNECTOR. THIS 
IS THE TYPE OF MOUSE WHICH CAN BE MODIFIED FOR THE VZ USING GARY'S 
METHOD. AN ALTERNATIVE SOLUTION IS ТО BUILD AN RS232 PORT FOR THE VZ 
AND PLUG IT IN DIRECTLY. 


(2) А BUS MOUSE - THIS TYPE OF MOUSE IS USED BY THE AMIGA, AMSTRAD, 
ATARI. AND SOME ІВМ CLONES SUCH AS THE COMMODORE PC COLT, PC10 & PC20 
AND NOW THE VZ. THE PLUG ON THIS TYPE OF MOUSE IS A DB9 PLUG, FOR 
THOSE МНО NEED HELP FINDING A SUITABLE MOUSE THERE IS ONE AVAILABLE 
FOR. 850-00 (APPROX) FROM GRACE BROS. ІТ IS А QTRONIX MOUSE FOR THE 
AMIGA 500/1000/2000, SERIAL NUMBER X30B (Bus VERSION). HOWEVER, SHOP 
AROUND AS I'M SURE THAT YOU CAN BUY THEM CHEAPER, | | 


FOR EACH OF THESE MICE, A TWO BUTTON AND THREE BUTTON VERSION EXISTS. 


THE HARDWARE: ~ | 

ТО CONNECT А BUS MOUSE TO THE VZ, THE 8 BIT INPUT PORT AS 
DESCRIBED IN JOURNAL #50 IS REQUIRED. THE РІМ DEFINITIONS ARE AS 
FOLLOWS : — | 


PIN — DESCRIPTION DATA LINE 
1 — VERTICAL MOTION - 00 
2 — HORIZONTAL MOTION - 01 
5 VERTICAL MOTION 90 DEG. OUT - 02 

OF PHASE ОҒ 1. 
4 - HORIZONTAL MOTION 90 DEG. OUT - D3 
OF PHASE OF 2. 
5 - MOUSE BUTTON 5 (OPTIONAL) - 04 
6 — MOUSE BUTTON 1 - 05 
Z — %5 VOLTS — М/А 
8 - GROUND – М/А 
9 - MousE BUTTON 2 - 06 


AS САМ ВЕ SEEN ABOVE, SOME MODIFICATIONS ТО THE INPUT PORT MUST BE 
MADE. THE CHANGES I MADE WERE ТО USE А DBO SOCKET AND CONNECT THE 
PINS AS SHOWN ABOVE. 07 MUST BE CONNECTED TO GROUND, THIS IS REQUIRED 


50 THAT THE MOUSE DRIVER CAN DETECT THE PRESENCE OF THE MOUSE PORT, 


WARNING: WHEN CONNECTING THE 8 BIT INPUT PORT TO THE PRINTER 
INTERFACE, CHECK WHICH VERSION OF THE INTERFACE YOU HAVE. THIS IS 
BECAUSE SOME INTERFACES USE At TO TRIGGER THE 7415138 NOT AQ. 


THIS MEANS THAT ALTHOUGH THE PRINTER IS ACCESSED WHEN 2൧ IS LOW 


(I.E. PORTS 0 - 15), THE INPUT PORT IS ACCESSED WHEN Ай IS HIGH (Т.Е, 


PORTS 16 - 51). THIS CAUSES ADDRESS CONFLICT WITH THE DISK SYSTEM. | 
ALSO NOTE THAT THIS VERSION OF THE INTERFACE IS NOT IN THE VZ 
TECHNICAL MANUAL. ВЕ CAREFUL! ! | | 


THE NOUSE DRIVER = — 
THE VZ MOUSE DRIVER IS AN INTERRUPT DRIVEN MACHINE CODE PROGRAM 


WHICH INTERPRETS THE RAW DATA SENT TO THE VZ BY THE MOUSE. THIS RAW 
DATA INDICATES MOUSE MOVEMENT AND BUTTON PRESSES. 


VZ BUS MOUSE PROJECT CONT. 40/5 


THE МАІМ AIM OF THIS PROJECT IS ТО PROVIDE MOUSE FACILITIES 
EQUIVALENT ТО THOSE ON AN ІВМ РС. THE LATEST MICROSOFT MOUSE DRIVER 
(VERSION 8.0) PROVIDES 53 FUNCTION CALLS THAT LET PROGRAMS PERFORM 
SPECIFIC ТА5К5, SUCH AS CHECKING A MOUSE BUTTON. THE VZ MOUSE DRIVER 
PROVIDES ALMOST THE WHOLE SUITE OF MOUSE FUNCTIONS, 


THE MOUSE DRIVER CAN BE BROKEN INTO THREE DISTINCT PARTS:- 


(1) THE INTERRUPT ROUTINE, 
(2) THE MOUSE FUNCTION LIBRARY, 
(5) THE BASIC MOUSE FUNCTION, 


NOTE: 


(I) VERSION 1.03 OF THE VZ MOUSE DRIVER ONLY SUPPORTS TEXT MODE (0) . 
(II) THIS VERSION OF THE MOUSE DRIVER SUPPORTS A MOUSE CURSOR WHICH IS 
INDEPENDENT OF THE KEYBOARD CURSOR. 


THE INTERRUPT ROUTINE: - 


EVERYTIME AN INTERRUPT OCCURS THIS ROUTINE MUST BE CALLED. ІТ 
LOOKS AFTER THE POLLING OF THE MOUSE AND MAINTENANCE OF ALL MOUSE 
"VARIABLES". THE MORE TIMES THE MOUSE IS POLLED, THE MORE SENSITIVE 
THE MOUSE CURSOR MOVEMENT. THE NUMBER OF TIMES THE MOUSE IS POLLED 
CAN BE SET BY A PROGRAM. 


THE MOUSE FUNCTION LIBRARY :- 


AS MENTIONED ABOVE, THERE ARE 53 IBM MOUSE FUNCTIONS. NOT ALL 
FUNCTIONS ARE PROVIDED ІМ V1.03 OF THIS DRIVER. THESE FUNCTIONS ARE 
DOCUMENTED ІМ TWO READILY AVAILABLE BOOkS:- 


(1) THE MICROSOFT MOUSE PROGRAMMERS REFERENCE - %65-0й FROM DYMOCKS 
(2) THE DOS PROGRAMMERS REFERENCE - $60-00 (APPROX) ALSO FROM DYMOCKS. 


IN THE NEXT JOURNAL І SHALL DESCRIBE EACH ОҒ THE AVAILABLE 
FUNCTIONS IN DETAIL. | 


THE BASIC MOUSE FUNCTION = 


TO ALLOW THE BASIC PROGRAMMER EASY ACCESS TO THE MOUSE FUNCTION 
LIBRARY, A NEW BASIC COMMAND HAS BEEN PROVIDED. THE SYNTAX OF THIS 
COMMAND IS:- | | 


MOUSE (M1%, М2%, М5%, М4%). 


М1% IS THE MOUSE FUNCTION NUMBER. 
M2% - M4% ARE PARAMETERS TO THE MOUSE FUNCTIONS. 


NOTE: NOT ALL PARAMETERS ARE USED BY ALL MOUSE FUNCTIONS BUT THEY MUST 
STILL BE PROVIDED IN THE CALL. 


THE NEW COMMAND MAY BE CALLED FROM WITHIN A BASIC PROGRAM OR IN 
IMMEDIATE MODE. ALTHOUGH YOU MAY USE INTEGER CONSTANTS AND VARIABLES 
TO CALL MOUSE FUNCTIONS, RETURN VALUES ARE PASSED BACK TO THE PROGRAM. 

THESE RETURN VALUES WILL ALWAYS BE STORED IN THE VARIABLES М1%, М2%, 
M3% AND M42, AND AS SUCH PROGRAMS SHOULD AVOID STORING DATA ІМ THESE 
VARIABLES. | | 


TO ВЕ CONTINUED ........ 


20001 

20002 
00005 
00004 
00005 
00006 
00007 
00008 
20009 
00010 
00011 

00012 
00015 
00014 
00015 
00016 
00017 
00018 
00013 
00020 
00021 

20022 
00025 
00024 
00025 


00025 


00027 
00028 
00029 
00050 
00051 

00052 
00055 
00054 
00055 
00056 
00057 
00058 
00059 
00040 
00041 

00042 
00045 
00044 
00045 
00046 
00047 
00048 
00049 
00050 
00051 

00052 
00055 
00054 
00055 
00056 
00057 
00058 
00059 
00060 
20061 

00062 


эы Т 
50 


; ЖЖ эе ЖИ 


;THIS PROGRAM IS А SAMPLE 

;USER FUNCTION TO BE USED 

; IN CONJUNCTION WITH KSCAN 

‚ Ж зе эе эе ЭЕ Эк эе Эк жє эк эе эе ЭЕ HE AE HE IE IE E HE NE FE жж 
BOX EQU 28866 

SCAN EQU @002BH 

PWON EQU 4008H 

PWOF EQU 400BH 

SRCH EQU 402CH 

LOAD EQU 4041H 

FTYP EQU "T" 

NEW EQU 1B4DH 

RUN EQU 36E9H 

EXIT EQU 1A19H 

WLTC EQU 6800H 

RLTC EQU 30779 

ЖЖ эк эк эк Эк Эк Эк эк эк эк ЖЕ ЖЕ ЭК ЭЕ ЭК ЭК эк эк ЖЕ ЭК ЭК э эк ЭЕ 
;USER: APPLICATION PROVIDED 
; USER FUNCTION. 


USER PUSH AF 
CP 2 
JR NZ,USE4 
CALL SAVE 
CALL DBOX 
LD HL,MES1 
USE1 CALL MSG 
USE2 CALL SCAN 
СР "М н 
JR 2,൮55 
СР күн 
JR NZ,USE2 
;LOAD THE DISK FILENAME 
CALL LNAM 
;СНЕСК IF THE FILE EXISTS 
CALL FIND 
LD HL,MES2 
СР 2 
JR  NZ,USE1 
CLEAR THE PROGRAM AREA 
CALL NEW 
CALL PWON 
CALL LOAD 
PUSH АЕ ` 
CALL PWOF 
РОР АЕ 
LD HL, MESS 


JR 14൧,501 
LD DE, (50884) 
JP RUN 
USES CALL REST 
РОР AF 
ХОК А 


USE4 РОР АҒ 
КЕТ 


лем жж ж жм 


:DBOX: DRAW THE POPUP MENU. 


2 


407/5. 


E MILBURN 
PART— 5 
00065 DBOX LD HL , BOX 
20064 LD (HL) ,142 
00065 INC HL 
200066 LD (HL) ,140 
00067 LD ОЕ,ВОХ+2 
00068 LD ВС,26 
00069 LDIR 
00070 LD (HL) ,141 
00071 LD HL ,B0X+64 
00072 LD (HL) ,139 
00075 ІМС НІ 
00074 LD (HL) ,131 
00075 LD ОЕ ,ВОХ+66 
00076 LD ВС, 26 
00077 LDIR | 
00078 LD - (HL) , 135 
00079 КЕТ 
00൫080 a FE FE RE E IE HE RE FE ЭК HE IE З Же ЖЕ ЭЕ Же HE ЖЕ ЖЕ ЭЕ жж 
00081 ;MSG: DISPLAY USER MESSAGE. 
00082 ; 
00085 MSG LD ОЕ, ВОХ+52 
00084 LD ВС, 28 
00085 LDIR 
00086 RET 
00087 МЕ51 EQU $ 
00088 :5 
00089 ОЕЕВ 158 
00090 *GO TO THE MAIN MENU (YIN) ?* 
00091 DEFB 153. | 
00092 МЕ52 EQU $ 
00035 :5 _ 
00094 DEFB 158 
00095 *ERROR: CHANGED DISK (Y/N)?* 
00096 DEFB 155 
00097 МЕ53 EQU $ 
00098 :5 
00099 DEFB 158 
00100 * DISK ERROR: RETRY (Y/N)? * 
00101 DEFB 133 
00107 ини эе Же ЭК 36 ЭК 38 ЭЕ Же ЭЕ Xe Же Ye ЖЕ ЖЕ ЗЕ Эй ЖЕ 
001035 :5АУЕ: SAVE THE SCREEN INFO 
00104 ; WHERE THE РОР UP І5 
00105 ; ТО ВЕ DISPLAYED. 
00106 ; | 
00107 SAVE LD HL , BOX 
00108 LD DE, BOXI 
00109 LD ВС,96 
00110 LDIR 
00111 LD А,52 | 
00112 LD (WLTC),A 
00115 БЕТ 
00114 800 DEFS 100 
00115 Же ЖЕЖ ЖЖ 
00116 ; REST: THIS RESTORES THE 
00117 ; DISPLAY BACK TO ITS 
00118 : ORIGINAL STATE. 
00119 ; 
00120 REST LD НЕ, ВОХ1 
00121 LD ОЕ, ВОХ 
00122 LD BC ,96 
00123 LDIR 
00124 LD А, (RLTC) 


SCAN PART-3 CONTINUED O/T 
00175 LD (WLTC),A 
00126 КЕТ 


00128 МАМ: LOAD THE МАМЕ ОҒ THE 


00129; PROGRAM INTO THE DISK 
00150 ; FILENAME BUFFER, 
00151 ; 

00152 LNAM LD HL,FNAM 
00153 Duo LY 

00134 POP DE 

00155 INC DE 

00156 Ж 18൮5 

00157 LDIR 

00158 LD A,FTYP 

00139 LD (DE) ,A 

00140 RET | 

00141 FNAM EQU $ 

00142 :1 


00145 *MAINMENU* 


00145 ;FIND: CHECK THAT THE DISkK 


00146 : CONTAINS THE PROGRAM 
00147 ; TO LOAD. 

00148 : 

00149 FIND CALL PWON 

00150 CALL SRCH 

00151 PUSH AF 

00152 CALL PWOF 

00155 РОР АЕ 

00154 RET 


EDITOR'S COMMENTS: 


THE SOURCE CODE FOR К5САМ2.1 CONSISTS OF 5 FILES, 111770, BASIC, 
SYSTEM; PLOT AND MATRIX, BELOW YOU WILL FIND DETAILS OF EACH FILE 
TOGETHER WITH NUMBER ОЕ LINES OF EACH FILE AND NUMBER OF PAGES PER 
FILE WHEN PRINTED IN TWO COLUMNS PER PAGE (SEE PAGE б FOR EXAMPLE), 


IF І PRINTED 5/4 PAGES PER ISSUE IT WOULD ТАКЕ 4/5 ISSUES ТО 
COMPLETE WHICH IS TOTALLY UN-ACCEPTABLE. | 


ONLY ONE EDITOR ASSEMBLER IS CAPABLE OE ASSEMBLING THE SOURCE 
CODE, LESLIE MILBURN'S DISKOPS6 (64K VERSION - PUBLIC DOMAIN) MUST BE 
USED, BESIDES NEEDING THE EXTRA MEMORY DISKOPS5 ALSO HAS ADDITIONAL 
COMMANDS, ONE OF WHICH IS USED TO ‘LINK' THE SOURCE CODE TOGETHER, 


INIT 15 05 А815 DEEF 36DC - LINK BASIC - 694 LINES - 5,60 PAGES 
BASIC ТА ഥാ А815 C831 201E - LINK SYSTEM - 451 LINES - 5.65 PAGES 
SYSTEM 0B ØC А815 B/E7 ൧004 - LINK PLOT - 180 LINES - 1.45 PAGES 
PLOT 00 00 А815 ААЗА 0277 - LINK MATRIX - 21 LINES - 0.16 PAGES 
MATRIX QE 05 А815 DØ4D 283A - - 599 LINES - 4.85 PAGES 


wu < s «қама ഫയ ss ശൈ “s a മോശ തര r қылша “ D തയ «мыны S ശത്തെ D 


1945 LINES - 15.68 PAGES 


USER 02 00 A813 85АВ 0858 - PRINTED THIS ISSUE, 
КОСАМ2.1 01 00 7АЕ9 8267 @77Е - КЅСАМ2.1 OBJECT CODE (M/C) 


FOR ANY INFORMATION ON К5САМ2.1, ITS SOURCE CODE ов ൧15056 
CONTACT LESLIE MILBURN, ADDRESS AND PHONE NUMBER ON PAGE 12. | 


зе 


OPERATING INSTRUCTIONS FOR O/B 
Ex TENDED DOS FACILITIES V12.1 
BY LESLIE MILBURN 


EXT DOS У12.1 CONMANDS 
FORMAT 


THIS IS THE SAME AS DOS INIT. Іт INTTIALISES А DISK FOR USE. WHEN 
FINISHED IT PROMPTS USER FOR A DISK LABEL AND THE CURRENT DATE. 


LABEL - THIS ALLOWS THE USER TO PUT A LABEL ON A FORMATTED DISK, 
VOL - THIS ALLOWS THE USER TO READ BACK THE DISK LABEL. 


NOTE: THE DISK LABEL USES A S:FILETYPE (SYSTEM FILE) AND OCCUPIES 
ОМЕ SECTOR ON THE FLOPPY DISKETTE. IF YOU WISH TO PLACE THE DISK 
LABEL ON PART OF THE DISK WHICH IS NOT USED THEN Т SUGGEST THAT THE 
SECOND HALF OF TRACK Й SECTOR 15 BE USED. THIS IS CURRENTLY UNUSED. 


OLST же С?) = FILETYPE (OPTIONAL) 


THIS DISPLAYS ALL FILES ON THE FLOPPY DISKETTE BY ?:ЕПЕТҮРЕ, THE (൦) 
IS OPTIONAL BUT IF МОТ SPECIFIED THEN ALL FILES WILL BE DISPLAYED. ТЕ 
T IS SPECIFIED, (IE. DIST) THEN ONLY T:FILETYPEs WILL BE DISPLAYED. 
THE OUTPUT FORMAT IS AS FOLLOWS: | 


FILETYPE :FILENAME - START - MEMORY ADDRESS 
| TRACK SECTOR - START END 
T:FILENAME 01 00 AES 8673 


AFTER ЕАСН SECTOR ОҒ THE DISK DIRECTORY HAS ВЕЕМ DISPLAYED THE OUTPUT 
WILL BE PAUSED. PRESS SPACE TO CONTINUE LISTING OR BREAK TO ЕХТТ. 


СНА "ЕТЕЕМАМЕ ", т — c?) = FILETYPE 


THIS FACILITY ALLOWS YOU TO CHANGE THE FILETYPE оғ A FILE ON DISK. 
THE FILENAME AND FILETYPE ARE REQUIRED. 


NOTE: AFTER CHANGING THE FILETYPE THE PROGRAM OR DATA MAY NO 
LONGER RUN OR LOAD. СНА CAN BE USED TO PROTECT FILES AGAINST 
ACCIDENTAL ERASURE OR TO CONVERT SOURCE CODE FILES FOR USE WITH OTHER 
EDITOR ASSEMBLERS. 


REL" FILENAME", x x x > 


THIS FACILITY ALLOWS YOU TO RELOCATE A FILE. THE FILENAME AND NEW 
START ADDRESS IS REQUIRED. ‘A NEW END ADDRESS IS AUTOMATICALLY 
CALCULATED. AND BOTH THE NEW START AND END ADDRESSES ARE PLACED INTO 
THE DISK DIRECTORY. USE HEX NUMBERS ONLY, 


NOTE: A BASIC PROGRAM CAN BE RELOCATED TO A NEW START ADDRESS. 


HOWEVER, SOMETIMES THE RUN COMMAND WILL NOT WORK. HINT: TRY TYPING 
THE FIRST LINE IN IMMEDIATE MODE THEN GOTO 20 (FOR EXAMPLE), 


EXA, XXX. YYYY 


[HIS FACILITY ALLOWS YOU TO EXAMINE АМҮ TRACK (XXXX) AND SECTOR (YYYY)? 


ON THE FLOPPY DISKETTE. USE ONLY HEX NUMBERS. THE SECTOR WILL THEN 


BE DISPLAYED. PRESS SPACE TO CONTINUE SEEING THE FOLLOWING SECTORS ON 
THE DISKETTE. ТО EXIT USE BREAK, 


= 


00001 


00002 
00005 


00004 


00005 
00006 
0000/ 
00008 
00009 
00010 
00011 
00012 
00013 
00014 
00015 
00016 
00017 
00018 
00019 
00020 
00021 
00022 
00025 
00024 
00025 
20026 
00027 
00028 
00029 
00050 
00051 
20052 
00055 
00054 
00055 


EXT DOS СОММ' S V12. 


4 383636565536 HE REHE S£ Же ЭЕ ЗЕЕ жеде ЭЕ Еж 


;EXTENDED DOS COMMANDS V12.1 


а 
2 


PCHR 
SYER 
GCHR 
PMSG 
PWON 
PWOF 
DERR 
SRCH 
SECI 
Col 
WRTE 
INBF 
INPT 
FSAV 
СОМА 
НЕХ 
CLS 
WKEY 
BAS 
NEW 
RST 
ORG 


SBAS 


TOM 
HTAB 
SSPC 


; ж эк эк эе эк эк эк эк эе Эк ЭК е эе Же Ж ЭК ЭК ЭК 36 эк ЭЕ Же ЭЕ ЭК ЭК S Ж 


;CODE IS МОТ RELOCATABLE. 


; ЗЕ Эк NE е ж Ж Жж 


EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 


@55АН 
1997Н 
1D78H 
2B75H 
4008H 
20000 
42 ЕН 
2.02 
20520 
21 DH 
405 2H 
/9ЕВН 
EQU @567Н 
EQU 2024 
EQU 44 
EQU 4020H 
EQU 01090 
EQU 49H 
EQU 1219 
EQU 1820 
EQU 7804H 
EQU ZAE9H 
EQU Z8A4H 
EQU 78B1H 
EQU 78A6H 
EQU 78A0H 


;BRUN: THIS FUNCTION IS 


. 
3 


00036 : 


00057 
00058 
00059 
00040 
00041 


00042 


00045 
00044. 
00045 
00046 
00047 
00048 
00049 
00050 
00051 

00052 
00055 
00054 


BRUN 


CALLED WHEN RUN FROM 
DISK. 

CALL CLS. 

LD ЭР, 7700H 

LD — HL, (RST) 

LD (VCTR) ‚НЕ 


LD HL,CMD 

LD (ROTI „НЕ 
DEC HL 

LD ( TOM) , HL 
LD DE,50 

OR А 

SBC- ALDE 

LD (SOLE 
LD HL,ORG 

LO (SBAS) , HL 
CALL NEW 

ЈР BAS 


; Жз зе эе эе эе эе HE 36 HE ЭЕ ЭЕ ЭК HE X 3k Se ЕЕ 3 ЭЕ Se ЖЕ 


SSE 


00055 ; 
00056 : 


00057 
00058 
00059 
00060 
20061 

20062 


CMD 


THIS FUNCTION CHECKS 
AND PROCESSES THE NEW 
COMMANDS . 
EXX x 
LD НЕ, 1D5BH 
POP DE 
OR А 
SBC HL,DE 
PUSH DE ` 


1 CONT. 2/9 
00065 EXX ` | 
00064. УР NZ, GCHR 
00065 PUSH HL 
00066 CALL GCHR 
00067 JR М2, CMD 
20068 POP POP HL 
00069 LD DE, (VCTR) 
00070 PUSH DE 
20071 КЕТ 
00072 CMD1 СР "ұн 
00073 JR ൮൧, 1402 
00074. CALL VOL 
00075 JR C, POP 
00076 JR CMDX 
00077 СМО? СР 2 
00078 JR NZ ,CMD3 
00079 CALL LABL 
00080 JR C , POP 
00081 JR CMDX 
00082 СМ03 CP ысы 
00083 JR NZ ,CMD4 
00084 CALL EXA 
00085 JR С, POP 
00086 JR CMDX 
00087 СМПа CP "D" 
00088 УВ NZ ,CMD5 
00089 — CALL DIS 
20090 JR C, POP 
00091 JR (MDX 
00092 CMDS СР 25” 
00095 JR NZ ,CMD6 
20094 CALL CHA 
00095 JR C, POP 
00096 JR СМОх 
00097 CMDS СР "R" 
00098 УВ МЕ, РОР 
00099 CALL REL 
00100 JR C, POP 
00101 CMDX POP DE 
00102 РОР ФЕ 
00105 LD DE,1D1EH 
00104 PUSH ПЕ 
20105 КЕТ 
00106 VCTR DEFW 0 
00107 ЕМАМ EQU $ 
00108 ; 

00109 *DISKINFO* 

00110 a ЭЕ ЭЕ ж зе 38 BE еле 36 36 эе HE Же ЭК AE 36 3⁄ Же ЭК ЭК AE 3 жж 
00111 ;VOL: THIS DISPLAYS THE DISK 
00112 : LABEL. 

00115: 

00114 VOL CALL GCHR 

00115 ОЕ г 

00116 SCF 

00117 RET NZ 

00118 CALL GCHR 

00119 СР м Жм 

00120 SGF 

00121 КЕТ NZ 

00122 CALL GCHR 

00123 JP NZ,SYER 

00124 ;5АУЕ THE BUFFER POINTER 


EXT DOS СОММ' $ У12.1 


00125 
00126 
00127 
00128 
00129 
00150 
00151 


00132 


00155 
00154 
00155 
00156 
00157 
00138 
00159 
00140 
00141 
00142 
00145 
00144 
00145 
00146 
00147 
00148 
00149 
00150 
20151 
00152 
00155 
00154 
00155 
00156 
00157 
00158 
00159 
00160 
00161 
00162 
00165 
00164 
00165 
00166 
00167 
00168 
00169 
00170 
00171 
00172 
00175 
00174 
00175 
00176 
00177 
00178 
00179 
00180 
00181 
00182 
00185 
00184 
00185 
00186 


¿LOAD THE 


PUSH HL 
FILENAME 


LNAM 


PWON 
SRCH 


CALL 
DI 
CALL 
CALL 
CP 
LD 
ӘР 


А,15 
NZ ,DERR 


; ОРОМ EXIT FROM SEARCH DE 
sPOINTS TO START TRACK IN 


ОТВ 


ENTRY. 
LD? 

LD 
INC 
LD A, (DE) 

LD “(IY+17Z),A 
CALL SECT 

CALL PWOF 

Бі 


А, (DE) 
(IY+18),A 
ОЕ 


‘CLEAR TWO SCREEN LINES. 
L 


VOL 


МӘСІ 


SRU 


HL, (7820H) 
HL 

B, 63 

A, 52 
PCHR 
VOLT 

HL 
(7820Н) 
А,0 

LD (НТАВ),А | 
POINTER TO DISK LABEL 
Me ЕЗИ 

L, (1Ү-49) 


‚ HL 


LD 


;SAVE IT 


PUSH HL 


‘PLACE A NULL BYTE AFTER 
:ЕАСН STRING. THIS MEANS 
; THAT DISK LABELS CREATED BY 
;QUICKWRITE САМ BE DISPLAYED 


:DISPLAY 


PUSH HL 
LD ‘DE 62 
ADD HL,DE 
LD (HL),0 
ADD HL,DE 
INC HL 
INC HL 
ADD HL ,DE 
LD (HL), 
DISK LABEL. 
HL 
PMSG 
А,15 
РЕНК 
HL 
ЮЕ, 63 
HL , DE 
PMSG 
2122 
CALL PCHR 
POP HL 
OR А 


POP 
CALL 
LD 
CALL 
POP 
LD 
ADD 
CALL 
EE 


00187 
00188 
00189 


00190 ; 


00191 
00192 
00193 
00194 


00195 
_ 00196 


00197 


00198. 


00199 
00200 
00201 
00202 
00205 
00204 
00205 
00206 
00207 
00208 
00209 
00210 
00211 
00212 
00215 
00214 
00215 
00216 


00217 


20218 
00219 
00220 
00221 
00222 
00225 
00224 
00225 
00226 
00227 
00228 
00229 
00250 
00251 
00252 
00255 
00254 
00255 
00256 
00257 
00258 
00259 
00240 


00241 


00242 
00243 
00244 
00245 
00246 
00247 
00248 


CONT. 


RET 


4071 


1 Ез эе зе ലിലി Зе IE SE Z X€ жж 


;LNAM: THIS FUNCTION LOADS 


THE FILENAME INTO THE 


DISK NAME BUFFER. 


NAM LD 


HL, FNAM 


PUSR LY 


POP 
INC 
LD 


LDIR 


LD 
RET 


DE 
DE 
BC, 8 


(IY+9), "3" 


Хе ЖЖ ЖЕ 


;LABL ; THIS FUNCTION PLACES 
A LABEL ON A DISK. 


ГАВ CALL 
СР 
SCF 
RET 
CALL 
CP 
SCF 
RET 
CALL 
CP 
SCF 
RET 
CALL 
CP 
SCF 
RET 
CALL 
ЈР 


GCHR 
fol 


NZ 
GCHR 
" В "n 


М2 
GCHR 
"Е" 


NZ 
GCHR 
СА н 


NZ 
ОСНК 
М2,5ҮЕК 


; SAVE BUFFER POINTER. 


PUSH 


HL 


;SAVE INPUT BUFFER CONTENTS. 


LD 


LABI 


HL, INBF 
ВЕЕ сви 
ВС, 64 


Bl Mss. 
PMSG 
INP T 

С, LABX 
А, (ІМВЕ) 
JL +: 

Z, LABI 


:СОРҮ INPUT TO INTERNAL 


PUFF ER 
LD 
LD 
LD 
LDIR 
LD 
CALL 

| АВ? 
JP 
LD 
CP 
JR 


CALL: 


DE,LBF1 
HL, INBF 
BCs OZ 


ALa ESZ 
PMSG 
ІМРТ 

C. LABA 
А, (ІМБЕ) 
2,2 

2, АВ2 


;СОРҮ ТМРУТ ТО INTERNAL 


EXT DOS СОММ' $ У12.1 CONT. 


00249 
00250 
00251 

00252 
00255 
00254 
00255 
00256 
00257 
00258 
00259 
00260 
00261 

00262 
00265 
00264 
00265 
00266 
00267 
00268 
00269 
00270 
00271 

00272 
00275 
00274 
00275 
00276 
00277 
00278 


00279 


00280 
00281 

00282 
00285 
00284 
00285 
00286 
00257 
20288 
00289 
00290 
20291 

00292 
00295 
00294 
00295 
20296 
00297 
00298 
00299 
00500 
00501 

00502 
00505 
00504. 
00505 
00506 
00507 
00508 


003509 ; 


00510 


BUFFER: 
LD Ba oo ое 
LD HL, INBF 
LD BC, 62 
LDIR 


‘PLACE LABEL NAME INTO 
DISK BUFFER. 
CALL LNAM 
DI 
CALL 
;CHECK IF 
EXILIO TO; 
CALL SRCH 
СР 2 
ӘР 2, БЕКЕ 
; SAVE THE CURRENT START AND 
SEND OF BASIC POINTERS. 
LD HL, (Z8A4H) 
Ue ` 
LD HL, (79-96) 
PUSH HL ` 
;SEËE] THE START AND END 
; ADDRESS OF LABEL DATA. 
LD HL ,LBF1 
LD (Z8A4H) , HL 
LD eg СОРТЕ 26 
LD (78-91 , HL 
CALL FSAV 
CALL PWOF 
EI 
RESTORE ORIGINAL START AND 
SEND OF BASIC POINTERS. 
POP- TE 
LD (Z8F39H) ,HL 
POR CRE 
CO (Z8A4H) , HL 
LABX LD sg LBF 
RESTORE. INPUT BUFFER -CONTS; 
LD DE, INBF 
LD ВС, 64 
(РІК 
POP HL 
ОК А 
RET 
EQU $ 


PWON 
THE FILE ALREADY 


MES1 
ed 
*ENTER DISK LABEL :—* 

DEFB To 

DEFB 0 
MESZ EUU % 
“ЕМТЕК TODAY'S ПАТЕ:-% 

DEFB 12 

DEFB @ 
: INTERNAL BUFFER FOR STORING 
"ІНЕ DISK LABEL, 
EBF ВЕРЬ 
CBFA ОЕР УТИ 


‚ езе эе же ELELEE ЖЕ X€ ээ же эж Хе 953556365636 
? 


:ЕХА: THIS FUNCTION ALLOWS 
Е АМҮ SECTOR ТО ВЕ 

; VIEWED. 

EXA CALL GCHR 


00511 
00512 
00515 
00514 
00515 
00516 
00517 
00518 
00519 
00520 
00521 
00522 
00525 


00524 


00525 
00526 
00527 
00528 
00529 
00550 
00551 
00552 
00555 
00554 
00555 
00556 
00557 
00558 
00559 
00540 
00541 


00542 


00543 
00544 
00545 
00546 
00547 
00548 
00549 
00550 
00551 


00552 


00555 
00554 
40555 
00556 
00557 
00558 
00559 
00560 
00561 

00552 
00565 
00564 
00565 
00566 
00567 
00568 
00569 
00570 
005/1 

00572 


ы 
ЗОР 
НЕТ 
CALL 
ЕР 
SCF 
RET 
CALL 
СР 

S SEE 
RET 


43711 


"Хх" 


NZ 
GCHR 
МАЛЫ 
М2 
GCHR 
COMA 


NZ 


; INCREMENT POINTER PAST THE 
COMMA, 


INC 
CALL 
RET 
PUSH 
LD 
RST 
РОР 
КЕТ 
LD 


HL 

HEX 

C 

HL 

НЫ, 59 

18H 

HL 

С 
(1Ү-18),Е 


; CHECK NEXT CHAR. 


LD 
GP 
20 
КЕТ 
ІМС 
CALL 
RET 
гай 
LD 
RoT 
FOP 
RET 
LD 
DEC 
CALL. 
ЈР 


А, (HL) 
СОМА 


М2 

ж Ж 
НЕХ 

г 

HL 

НЕ, 16 
18H 

HL 

о 
РУБ 
HL 

GCHR 

NZ ,SYER 


SAVE BUFFER POINTER 


ЕХА1 


PUSH 
CALL 
DI 

CALL 
CALL 
CALL 
а! 


HL 
CLS 


PWON 
SECI 
PWOF 


ച THE SECTOR, 


EXA2 


ЕХАЗ А 


ЕХАД | 


CALL 
LD 
INC 


CONTINUED NEXT ISSUE . 


BSET 
АЯ LZ) 
А 

15 

Z EXA4 
(ТҮ+17),А 
WKEY 

1 

2,ЕХАХ 
ЭА 

2 EXA] 
EXAS 
Sans 
A 


ОТКОРБЫ1 % 2 (DISK OPERATIONS) 40/12? 
INSTRUCTIONS BY LESLIE MILBURN 


THIS IS A ‘MACHINE CODE UTILITY WHICH ALLOWS MACHINE CODE 
PROGRAMMERS USING THE DICK SMITH EDITOR ASSEMBLER TO SAVE AND LOAD 
THEIR SOURCE CODE TO AND FROM DISK. (NOTE TO SAVE OBJECT CODE A TAPE 
MUST STILL BE USED) AS THE PROGRAM IS NOT RELOCATABLE TWO VERSIONS ARE 
SUPPLIED ON DISK, THESE ARE:- 


DISKOPST - EXPANDED У7200 
DISKOPS2 - EXPANDED У2500 


GETTING THE PROGRAMS OPERATIONAL: — 


STEP 1: POKE 50897 ,200:РОКЕ 39898, 242 
STEP 2: BRUN"EDITOR ASSEMBLER" 
OR: CRUN"EDITOR ASSEMBLER" 
STEP 5: ONCE THE EDITOR ASSEMBLER IS OPERATIONAL ENTER THE FOLLOWING 
LINE : — 
ӘР 4005H - ASSEMBLE AND RUN. THIS WILL REBOOT THE DOS. 
STEP &: BRUN"DISKOPS 1 OR 2" DEPENDING ON THE MEMORY SIZE OF YOUR VZ. 


THE ADDITIONAL COMMANDS ARE : — 

TU:FILENAME - LOAD SOURCE FILE FROM DISK. 

TR:FILENAME - SAVE SOURCE FILE ОМ BISK. 

TD: - THIS IS FOR USE WHEN THE SOURCE FILE ISN'T COMPLETE. 
ІНЕ SouRCE CODE IS SAVED WITH THE FILENAME OF SOURCE . 


IF THE FILE ALREADY EXISTS THEN THE NEW FILE 
REPLACES THE FILE ON DISK. 


WARNING :— 
THE TD: ROUTINE INTERFERES WITH THE DISK TRACK MAP SO USE THIS 


WITH CAUTION. I RECOMMEND THAT А SEPARATE DISK BE USED AS IT IS 
POSSIBLE FOR DISK FILES TO BE DAMAGED. 


NOTE: — 

ALL SOURCE CODE FILES WHEN SAVED ARE OF FILETYPE 'W' AND ONLY THE 
FIRST 8 CHARACTERS OF THE FILENAME ARE RECOGNISED, ТЕ: У: F ILENAME 
ERROR MESSAGES: — 

IF THE ORIGIN IS NOT SET TO THE FIRST FREE BYTE AFTER THE SOURCE 
CODE USING THE "0" <<RETURN>> COMMAND THEN YOU WILL GET А *** WRONG 
ORIGIN FOR RUN *** ERROR, 

INFORMATION AND SOURCE CODE : — 


WRITE TO LESLIE MILBURN:- FOR А SOURCE CODE LISTING OR IF YOU HAVE ANY 
OTHER PROBLEMS. 


LESLIE MILBURN 11 SWORDFISH AVENUE RABY 2566 PHONE (02) 605-5981 


А SOURCE CODE LISTING IS AVAILABLE FOR %5-00. 


‘ASSEMBLY LANGUAGE PART 


LII 487/1535 


BY BOB KITCH 


LISTING 5: 


0010 
0020 
0050 
0040 
0050 
0088 
0089 
0090 
0100 
0110 
0120 
0150 
0140 
0150 
0160 
0170 
0180 
0190 


же Ж ЖЖЖ HE * 


Жжжж 1556 VZ SCREENS *** 
к» VERSION 1.3 інісі 
жж“ R B.K. 18/5/86 *** 


же ЖЖЖ ЖКЖ ЖЕЖ Ж 


' ***FIND ТОР OF MEMORY AND PROTECT 20 BYTES BY LOWERING ТОМ. 
IF РЕЕК (50791)=77 THEN СОТО 500 :'7847Н AS LOAD CHECK. 
M1=PEEK (50898) : L1 =РЕЕК (50897) : ' TOM POINTERS. 
ТМ-М1%256%11-21 : PROTECT 20 BYTES. 
М5-ІМТ(ТМ/256):15-ТМ-М5%256 : МЕМ ТОМ POINTERS. 
РОКЕ 50898,М5:РОКЕ 50897,5 : SET МЕМ ТОМ. 

CLEAR 50 : RESET ALL POINTERS. 

' THIS ACTION DESTROYS THE VLT-ALL VARIABLES MUST ВЕ RENEWED. 
М1=РЕЕК (30898) :L1=PEEK (30897) : NEW TOM POINTERS. 
ST=M1*256+L1+1 : NEXT ADOR IN RESERVED 
MS=INT (5T/256) :LS=ST-256%MS : START OF ROUTINE. 

IF 51>52767. THEN ST=ST-65536 : ‘CONVERT TO SIGNED INT 


0198 ' 


0199 
0200 
0210 
0220 
0250 
0240 
0250 
0260 
0270 
0599 
0400 
0410 


0420 


04.50 
0440 
0450 


0460: 


0470 


' LOAD MACHINE CODE INTO PROTECTED TOM AND SET USR POINTER 
CLS :PRINTA250, "LOADING MACHINE CODE” | 
: CHECK SUM COUNTER. 


С5%=@ 
: LOAD 16 BYTES ТО ТОМ. 


FOR ID=ST ТО ST+15 
READ УІ %:РОКЕ ID,VLZ%:CS%=CS%+VL% :'LOAD M/L INTO PROTECT 


NEXT ID 


IF CS%<>1483 THEN GOTO 1000 : WRONG DATA. 


0498 ' 


0499 
0500 
0510 
0520 


0594 ' 


0595 
0596 
0597 
0598 
0599 
0600 
0610 
0620 
0650 
0640 
0650 
0660 
0679 
0680 
0690 


0699 _ 


POKE 508635 ,М5:РОКЕ 30862,15 : SET USR POINTERS, 
POKE 50791,77 + SET LOAD CHECK, 
'***7-80 BLOCK MOVE ROUTINE. 

DATA 058,035,121 :'10 А, (7921H) PICK UP VALUE FROM USRO. 
DATA 055,090,112 :'LD HL,7000H (#286720 START VIDEO RAM) 
DATA 017,001,112 :'10 DE,7001H {#286750 NEXT) 
DATA 001, 255,007 :'LD BC,O7FFH (#20470 SIZE OF VIDEO RAM) 
DATA 119 : LD (HL) ,A 

DATA 257,176 ОТВ (BLOCK LOAD COMMAND) 

DATA 20] | “КЕТ 

'***INITIALIZE DELAYS - CONTROL SPEED OF EXECUTION BY D. 
150 : TONE IS REST (0-51). 
0%=4. : ‘DELAY IS SHORT (1-9) 
Р%=50/44 : SET UP SCREEN MODE. 
'**% THIS LOOP DOES A LOT OF WORK. 

‘WRIT LOADS ALL VALUES INTO THE A-REG FOR VIEWING, 

‘NIT SWAPS BETWEEN HI- AND LO-RES SCREEN MODES. 

'***IT SWITCHES BETWEEN NORMAL AND INVERSE SCREEN TYPES, 
ല്‍ SWITCHES BETWEEN GREEN AND ORANGE BACKGROUNDS. 

FOR A%=0 ТО 255 ‘CALL VALUES PUT INTO A=REG. 


MODE (0) :POKE Р%,0 
СІ5:РКІМТа254, "VALUE = 
A=USR (൧൫) 
COLOR ‚ 9: SOUND TA, D% 
COLOR, 1 : SOUND Т%,0% 
POKE РӮ, 1 

X=USR (A) 

COLOR ,0:S0UND TZ, 0% 
COLOR, 1 : SOUND TA, 0% 


"ЗАА: SOUND 7%, 0% 


ASSEMBLY LANGUAGE CONTINUED ച. 1 ച. 


0700 ° HI-RES SCREENS. 

0710 MODE (1) 

0720 X=USR (А%) 

0750 COLOR, 0: SOUND 7%, 0% 
0740 COLOR, 1 : SOUND Т5, 0% 
0/50 NEXT A% 

0800 СОТО 600 

0998 ' 

0999 '***WRONG DATA MESSAGE. 
1000 С5:РКІМ№Та250, "ERROR ІМ DATA ";С5% 
1019 END 


FUNCTIONS IN BASIC 


IT MAY BE A SURPRISE TO MOST BASIC PROGRAMMERS BUT THE FUNCTION 
(ЕМ) COMMAND, ALONG WITH THE SUBROUTINE (GOSUB) COMMAND, ARE PROBABLY 
THE MOST USEFUL BASIC COMMANDS. THEY ARE CONCISE AND CLARIFY BASIC 
CODING CONSIDERABLY. UNFORTUNATELY ONLY GOSUB IS SUPPORTED ON THE VZ. 


I HAVE HAD A NUMBER OF QUERIES FROM USERS ON HOW. TO USE THE FN 


STATEMENT - PARTICULARLY WHEN TRYING TO CONVERT PROGRAMS WRITTEN FOR 
OTHER MACHINES. ІМ THIS BRIEF NOTE, I WILL TRY TO EXPLAIN HOW TO GET 
AROUND IT. | 


IN THE LEVEL II BASIC ТНАТ IS ІМ THE VZ'S ROM, TwO TYPES OF 
FUNCTION ARE SUPPORTED - | | | 


1. LIBRARY (ОВ SYSTEM) FUNCTIONS, АМО 
2. USER-DEFINED FUNCTIONS. 


FUNCTIONS CAN BE USED TO MANIPULATE NUMERIC OR STRING DATA TYPES. 
THE VZ SUPPORTS A NUMBER OF INTRINSIC OR LIBRARY FUNCTIONS SUCH AS 
SOR, АТМ, RND, CHRS, LEFTS AND INT ETC. THE PROCEDURES FOR THESE ARE 
ІМВЕООЕО IN THE ROM AS BASIC UTILITIES. STEVE OLNEY'S EXTENDED BASIC 
"WAKES UP” А FEW MORE, SUCH AS DEFINT, CSNG AND STRINGS. 


UNFORTUNATELY ONE OF THE OMISSIONS FROM THE FULL LEVEL TI 
IMPLEMENTATION ON THE VZ IS THAT THE USER DEFINED FUNCTIONS (DEF ЕМУ) 
ARE МОТ SUPPORTED ІМ ANY WAY. RUSSELL HARRISON'S EXTENDED BASIC XB 
DOES PROVIDE SUPPORT FOR DEF FN HOWEVER. NOTE THAT FUNCTIONS CAN ONLY 
RETURN. A SINGLE VALUE TO THE CALLING PROGRAM. 


THE LACK OF THIS FEATURE OFTEN CROPS UP WHEN ATTEMPTING TO CONVERT 
PROGRAMS ТО RUN ON THE VZ - BUT WRITTEN IN OTHER DIALECTS OF BASIC. 
THE CONCISE CODING INHERENT IN FUNCTION STATEMENTS IS ALSO A DESIRABLE 
FEATURE WHEN WRITING CLEAR CODE. FORTUNATELY A FAIRLY SIMPLE REMEDY 
IS AT HAND AND DESCRIBED BELOW. 


THE FUNCTION STATEMENT HAS TWO COMPONENTS. THE FIRST IS THE 
ന DEFINITION OF THE FUNCTION, AND THE SECOND,. IS THE ACTUAL 
"IMPLEMENTATION ОК CALL TO THAT DEFINITION. LET'S ЕХРЕАТМ.... SUPPOSE 


THAT WE WISH TO FREQUENTLY COMPUTE THE AREA OF A CIRCLE GIVEN A NUMBER 
OF VALUES FOR THE RADIUS. THE COMMAND LINE 


10 DEF ҒМА(Х) = 5.1416 * X * X 


SHOULD BE DECLARED EARLY IN THE PROGRAM. DEF MEANS DEFINE, FNA 
MEANS FUNCTION A (ANY LETTER FROM А ТО Z САМ BE USED.), AND (X) IS A 
DUMMY ARGUMENT FOR THE RADIUS USED BY THE FUNCTION. THE RIGHT HAND 
SIDE OF THE ASSIGNMENT IS THE EASILY RECOGNIZED FORMULA FOR 
CALCULATING THE AREA OF A CIRCLE. 


ASSEMBLY LANGUAGE СОМТІМОЕР 40715 


LATER IN THE PROGRAM, THE VARIOUS VALUES. FOR THE RADIUS ARE 
ASSIGNED ТО VARIABLE V (EITHER FROM DATA OR INPUT STATEMENTS.) AND 
THEN FHE FOLLOWING LINE MAY APPEAR - 


210 PRINT V,FNA(V) 


THE TWO LINES GIVEN (10 AND 210) WILL TOGETHER, PRINTOUT THE 
RADIUS AND THE CORRESPONDING AREA FOR A CIRCLE. THE CALL BY ЕМА SENDS 
THE INTERPETER OFF THROUGH THE BASIC PROGRAM TO FIND THE DEF FNA 
STATEMENT. WHEN LOCATED, THE VALUE V IS SUBSTITUTUED FOR THE DUMMY 
VARIABLE, THE CALCULATION CARRIED OUT, AND THE RESULT RETURNED TO THE 
CALLING SEQUENCE. (ONLY A SINGLE VALUE CAN BE RETURNED.) | 


AS ALREADY STATED, THIS NEAT CONSTRUCT DOES NOT EXIST ТМ VZ BASIC. 
THE APPROPRIATE USE OF THE GOSUB/RETURN COMMANDS САМ. OVERCOME THIS 
SHORTFALL. ТНЕ GOSUB -COMMAND CAN RETURN MANY VALUES - BUT A FEW MORE 
ASSIGNMENTS ARE REQUIRED BEFORE GOING TO THE SUBROUTINE AND YOU HAVE 
TO KEEP TRACK OF THE SUBROUTINES’ LINE NUMBER. 


AN EXAMPLE. BEST ILLUSTRATES THIS - AND LET'S USE THE PREVIOUS 
EXAMPLE TO SHOW HOW IT САМ BE IMPLEMENTED ON THE VZ..... 


19 INPUT "ENTER RADIUS OF CIRCLE ":R 

20 GOSUB 1000 

50 PRINT"RADIUS ";R, "AREA ";A,"CIRCUMFERENCE ";C 
40 GOTO 10 

1000 A=3.1416*R*R 

1010 C=2*3.1416*R 

1020 RETURN 

2000. END 


NOT TOO DIFFICULT TO SET UP IS IT? NOTICE THAT TWO VALUES (A AND 
С) WERE RETURNED. THE CODING AND PROGRAM FLOW IS МОТ QUITE AS CLEAR 
AS USING THE FUNCTION STATEMENT. 


| HAVE FUN! AND DON'T BE FOXED ВУ FUNCTIONS WHEN NEXT CONVERTING 
PROGRAMS ONTO THE VZ. 


TECHNICAL ЮАТА SHEET # 1 


WORDPRO & DD POWER SUPPLY CIRCUITS: 


BOTH CIRCUITS WERE SUPPLIED. BY DAVE BOYCE SOME YEARS BACK AND ARE 
PUBLISHED AS A SUPPLEMENT TO THE TECHNICAL REFERENCE MANUAL, 


WORDPRO CIRCUIT : - CAN SOMEONE HELP WITH A TRUTH TABLE 
FOR THE DECODING CIRCUIT PLEASE AS IT HAS SOME UNUSUAL DECODING, ED. 


DD POWER SUPPLY CIRCUIT: 


THIS IS A STANDARD POWER SUPPLY CIRCUIT WITH NOTHING FANCY. IT'LL 
WILL BE INVALUABLE FOR THOSE WITH A CROOK POWER SUPPLY UNIT OR FOR 
THOSE WHO NEED ONE AND WOULD LIKE TO BUILD ONE THEMSELVES NOW THAT 
THEY ARE NO LONGER AVAILABLE FROM DICK SMITH. 


NOTE: IF THE DEMAND IS THERE I COULD PREPARE A PROJECT FOR 
PUBLICATION, BUT PLEASE LET ME KNOW AS SOON AS POSSIBLE, ED. 


ച. 16 


TECHNICAL DATA SHEET # 1 


WORD PROC. 


DISK DRIVE POWER SUPPLY CIRCUIT 


== DINYA j3nT"0 = рт 


+ ро ТЙ-8 Nia 
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DRIVE HEAD PARK UPDATE | 40—17 


AS А TWO DRIVE USER І FOUND IF І USED PARK IN DRIVE 2 IT WOULD 
PARK DRIVE 2. ON POWER UP OR RESET DRIVE 1 WOULD BANG ITS HEAD ОЕР. 
JASON OAKLEY MODIFIED IT SO PARK WOULD ALWAYS PARK DRIVE 1 REGARDLESS 
OF WHICH DRIVE IT WAS RUN FROM. | 


LOAD PARK SOURCE CODE INTO YOUR EDITOR ASSEMBLER AND INSERT THE 
FOLLOWING LINES BY TYPING І19 AT THE COMMAND PROMPT. 


020 ;SELECT DRIVE 1 
021 LD АТОН 
022 LD (IY+6BH) ‚А 


AS YOU INSERT THE LINES 020-022 THE OLD LINES FROM 020-070 ARE 


BEING RENUMBERED TO 0235-0735 TO END OF PROGRAM. NEXT EDIT LINES 065 
AND 072 AS SHOWN BELOW. . 


9635 * PARK1 BY DAVE MITCHELL 
072 * ОВТУЕ1 HEAD IS PARKED* 


THAT FINISHES THE ‘MODIFICATIONS. SAVE THE SOURCE AND OBJECT CODES 
AS SHOWN BELOW OR ACCORDING TO THE SYNTAX OF YOUR EDITOR ASSEMBLER. 


07 209H - SET ORIGIN 
A - ASSEMBLE 
TS:PARK-1 - SAVE SOURCE cope 
ТО:РАККТ - SAVE OBJECT CODE 


REGARDLESS -OF WHICH DRIVE You BRUN"PARK1" FROM, DRIVE 1 WILL 


ALWAYS BE THE DRIVE WHICH IS PARKED, WHICH MEANS NO MORE 
UN-INTENTIONAL HEAD BANGING. HAPPY PARKING !!! 


GARY BULLEY VZMOUSE ERRATTA: 


SOME ERRORS CREPT IN WHEN І WAS PREPARING GARY'S VZMOUSE PROJECT 
IN LAST ISSUE. МҰ APOLOGIES TO GARY BULLEY AND ALL CONCERNED, ED, 


THE ERRORS WERE IN THE VERO BOARD LAYOUT AND CONNECTIONS. THE 
CORRECTED (I HOPE) VERSION IS SHOWN BELOW. ПО NOT FORGET ТО CUT OFF 
PINS 6 & 8 ON UZ AND PINS 4 & 10 ON U3 WHICH ARE МОТ USED AS IT 
SIMPLIFIES BOARD LAYOUT. THE 'В’ CONNECTION FROM РТМ 5 ON U? TS MADE 
DIRECTLY ТО РІМ 5 ON Ul. OTHER CONNECTIONS ARE AS SHOWN. 





437/18 


TECHNICAL DATA SHEET # 2 


STATIC RAMS & VZ ROMS 


PINOUTS AND BLOCK DIAGRAMS ARE PRESENTED OF STATIC RAMS FROM 2K TO 


512K MODULE, VZ200/3500 ЗК & 16K BASIC ROMS AND 8K DOS ROM. 


128K, 
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= ме * DAVE MITCHELL SOFTWARE * w э 407/19- 


Е & F WP PATCH 2.2: PATCH 3.3 WRITTEN BY DAVE MITCHELL WILL 
CONVERT YOR Ë & F ТАРЕ WORD PROCESSOR ғов FULL DISK USE WHILE RETAINING ALL 
ORIGINAL FUNCTIONS. ІТ ALSO HAS SHIFT LOCK AND PRINTER CONTROL CODES WHICH САМ 
BE IMBEDDED IN TEXT AND SAVED TO TAPE OR DISK. 


ВБТМР. Е: THIS UTILITY PROVIDED WITH PATCH 3.3 WILL CONVERT BASIC 
PROGRAMS AND ED/ASS. SOURCE CODE FILES INTO WORD PROCESSOR FILES. 


PRICE : AUS/NZ AU$20.00 - UPDATE - AUS-$10.00 - N7-A811.00. 
EXTENDED DOS V1.3: THESE COMMANDS ARE AT YOUR DISPOSAL: MERGE, 
DIRA, DIRA, DIRB, LDIRB, QD, OLD., DEC, HEX, MENU, CODE, LTAB, MOVE AND ЦРОАТЕ, 
STATUSA AND LSTATUSA. STATUSA AND LSTATUSA ALSO WORKS WITH VERSION 1.0 DOS 

PRICE : АЮ15.09 - POSTAGE ІМІНГЕП | 
МЕМО/ЛЕТЕ COPIER: THIS UTILITY WILL READ YOUR DISK DIRECTORY AND 
PRESENT YOU WITH SEVERAL OPTIONS. USING THE CURSOR YOU CAN RUN/BRUN ANY PROGRAM 


OR SELECT FILE COPY, REN, ERASE, DRIVE 1 OR 2, ETC. BESIDES COPYING TEXT AND 
BINARY FILES ALL OTHER FILES CAN BE COPIED AS WELL EXEPT FOR DATA FILES, 


PRICE : AU$15.00 - POSTAGE INCLUDED 
FOR PURCHASE OR INFORMATION CONTACT: 
DAVE MITCHELL 24 ELPHINS TONE STREET 


NORTH ROCKHAMPTON QUEENSLAND 47201 
AUSTRAL TA — PHONE: (279) 27 8519 





VZ DISASSEMBLER : WHAT, ANOTHER DISASSEMBLER? BUT, YOU HAVE 
ALREADY GOT ONE? THIS ONE IS DIFFERENT! THIS PROGRAM IS ENTIRELY WRITTEN ІМ 
MACHINE CODE. IT ACTUALLY RUNS ABOUT 40 TIMES FASTER THAN D.S.E.'S DISASSEMBLER 
(OR ANY ONE ELSE'S ). IT WILL DISASSEMBLE ANY PROGRAM THAT YOU CAN BLOAD INTO 
MEMORY. ІТ WORKS WITH ANY VZ CONFIGURATION. IT DISASSEMBLES EVEN THE 88 EXTRA 
280 ОРСООЕЗ THAT ZILOG DOESN'T ADMIT TO. 


PRICE : AU$25.00 - PRICE INCLUDES HARDCOPY MANUAL. 
ТАРЕ -AND DISK VERIONS AVAILABLE. 


VZ MODEM SOFWARE : DID YOU WANT TO TALK TO OTHER COMPUTERS VIA A 
MODEM? DID YOU BUY THE DSE TERMINAL EPROM, ONLY TO DISCOVER THAT IT ONLY WORKS 
WITH TAPE. IT ONLY ALLOWS YOU TO PRINT FILES, NOT SAVE THEM OR SEND THEM! 


YOUR PROBLEMS ARE SOLVED! THE HICKMAN BROTHERS, PETER AND ANDREW, HAVE A 
ӘКАМО NEW PROJECT WHICH WILL ALLOW YOU TO SEND, RECEIVE & SAVE FILES VIA А 
MODEM. ІТ WORKS WITH DISK! 


SALE PRICE: $25.00 - INCLUDED ARE INSTRUCTIONS FOR THE HARDWARE 
MODIFICATIONS, A SMALL MODIFICATION IS NEEDED TO YOUR DISK CONTROLLER. YOUR 
USER GROUP MAY HELP YOU MODIFY YOUR COMPUTER TO USE THIS EXCITING NEW SOFTWARE! 


THE MANUAL IS SUPPLIED ON DISK FOR PRINTING OUT WITH YOUR DISK VERSION OF Е 
& F W/PROCESSOR. IF YOU DO NOT OWN АМЕ & F W/PROCESSOR THEN PLEASE ENCLOSE 
ANOTHER $5.00 (TOTAL $50.00) FOR PHOTOCOPYING AND POSTAGE OE THE MANUAL. 


FOR PURCHASE OR INFORMATION CONTACT: 
PETER HICKMAN PO BOX 8 WERRINGTON 2747 


en ч 
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SAPPHIRE PRODUCTIONS - VZ DISK MAGAZINE - PUBLIC DOMAIN 


VZ USER GROUPS & PUBLICATIONS 402/20) 


жом CONTRIBUTIONS TO THE JOURNAL * ടെ 


ІЕ YOU АВЕ THINKING ОҒ CONTRIBUTING ТО THE JOURNAL THE PREFERED FORMAT IS 
BASIC LISTINGS, WORD PROCESSOR OR SOURCE CODE FILES ON ТАРЕ OR DISK, FILES FROM 


“ THE FOLLOWING WORD PROCESSORS САМ BE ACCEPTED :- 


Е & TAPE CR-OIS PATCH 3.1-3.3, WORDPRO CARTRIDGE, WOROPRO PATCH, MOST SOURCE 
CODE FILES AND ALL GUICKURITE WORD PROCESSOR FILES. 
** “CLUB MEETINGS — ALL WELCOME 7% % 
FIRST FRIDAY OF MONTH 


= = EUTURE MEETINGS = NEW VENUE % » 


AS MENTIONED BEFORE WE NO LONGER MEET AT JNC » BUT AT VARIOUS MEMBERS HOMES. 
MEETINGS WILL BE ONCE A MONTH AS BEFORE WITH THE DATES BEING FIRST FRIDAY OF THE 


MONTH. 


BECAUSE OF SOME LOCAL MEMBERS HAVING TO WORK SHIFTWORK MEETING DATES WILL BE 
ADJUSTED ТО ACCOMOOATE THEM. WHETHER YOU ARE A LOCAL MEMBER, INTRA OR 
INTERSTATE VISITOR PLEASE CHECK WITH JOE LEON FIRST BEFORE COMING OUT. 


JOE LEON 55 TIGHES TCE TIGHES HILL 2297 (049) 692 599 


ж CLUB COMMITTEE & SUBSCRIPTIONS * 


PRESIDENT - ROSS WOODS - SECRETARY /EDITOR - JOE LEON 
COMMITIEE MEMBERS - COLIN BRIDGE - PETER JONES 


SUBSCRIPTION TO - AUST. - 5 ISSUES $11.00 - 6 ISSUES $21.00 
H.V.VZ. JORNAL - М. Z. - 5 ISSUES $15.00 - 6 ISSUES $26.08 


FOR MORE INFORMATION СОМТАСТ: 
JOE LEON 55 TIGHES ТСЕ TIGHES HILL 2297 (049) 692 599 AUSTRALIA 
NOTE: PRICES INCLUDE POST & PACKING 


ж эе VZ USER GROUPS & PUBLICATIONS * > 


жанлы ысый злее ноте и നായാ ായോ ജായാ EEA EE EE AEREA യം 


VZ DOWN UNDER — VZ MAGAZINE - 6 ISSUES - %18.00 PER ANH 
HARRY H GGINS 12 THOMAS SREET MITCHAM VICTORIA 3132 


WAVZ - WESTERN AUSTRALIA VZ USER GROUP 
GRAEME ВҮМАТЕЕ РО ВОХ 588 MORLEY МА 6062 


BRISBANE VZ USERS WORKSHOP - С/О 63 TINGALPA ST. МММ WEST 4178 
SOFTWARE FOR SALE - DISK МЕМ) 
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NOTE : VZ DISK MAGAZINE HAS CEASED PRODUCTION 


ത്ത തേരു лань сое അയം ജ്ഞ തനയം Сар Котин одабир യ്യു apasqa одрасла цр ഞ്ഞാൻ തിയും യ്ത ധാമ ഓ ഉം ര БИО E. локоны очень ര്‍ത്ത യ്യാ NEESER, ജലശായി. ഷായെ 


NOTE : WHEN WRITING ТО ANY ABOVE OR Н.У.У2. USERS’ GROUP FOR INFORMATION 
PLEASE ENCLOSE A 5.5.А.Е. OR NZ 2 INT. REPLY COUPONS. 


